{-# LANGUAGE TemplateHaskell #-}

module HSMods.PseudoMacros where
import PseudoMacros
import MyTools.MyMacros

te1 :: IO ()
te1 = do
    $(_myLoc)
    putStrLn $ show file_name
    putStrLn $ show line_number
    putStrLn $ show location
    putStrLn $ show msg
  where
    file_name = $__FILE__
    line_number = $__LINE__
    location = file_name ++ ", line " ++ show line_number
    msg = "Hello from " ++ location ++ "!"
